home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 27 / PC Gamer IT CD 27.iso / MEDIA / ELINK.DXR / 00019_checkforapp.ls < prev    next >
Encoding:
Text File  |  1997-12-01  |  336 b   |  17 lines

  1. on checkForApp pathToApp
  2.   set i to the text of field "cdDrive" & pathToApp
  3.   put i
  4.   if FileExists(i) = 0 then
  5.     open(i)
  6.   else
  7.     SwapDisc(i)
  8.   end if
  9. end
  10.  
  11. on SwapDisc appPath
  12.   global whichCD, whichAppInstall
  13.   set whichAppInstall to 0
  14.   set whichAppInstall to appPath
  15.   go(1, the text of field "pathToProj" & "media\switch")
  16. end
  17.